(rassoc): Definition deleted.

diff --git a/lisp/emacs-lisp/cl-seq.el b/lisp/emacs-lisp/cl-seq.el
index bdb715089230a29a3738a210a8d92e2618b6bdcc..545f4f4e7e6e1796cf21db40a0f92fe30a8112e4 100644 (file)
--- a/lisp/emacs-lisp/cl-seq.el
+++ b/lisp/emacs-lisp/cl-seq.el
@@ -695,8 +695,6 @@ Keywords supported:  :test :test-not :key"
        (and cl-alist (car cl-alist)))
     (rassq cl-item cl-alist)))
 
-(defun rassoc (item alist) (rassoc* item alist ':test 'equal))
-
 (defun rassoc-if (cl-pred cl-list &rest cl-keys)
   "Find the first item whose cdr satisfies PREDICATE in LIST.
 Keywords supported:  :key"